home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
pascal
/
tegl6b.zip
/
INTROPAK.EXE
/
lha
/
TWDIALUD.DOC
< prev
next >
Wrap
Text File
|
1991-08-16
|
2KB
|
53 lines
{-----------------------------------------------------------------------------}
{ TEGL Windows ToolKit II }
{ Copyright (C) 1990, 1991 TEGL Systems Corporation }
{ All Rights Reserved. }
{-----------------------------------------------------------------------------}
{---------------------------------------------------------}
{ This unit implements the standard numeric types in }
{ turbo pascal. See TWDIALFP for 8087 emulation types. }
{---------------------------------------------------------}
UNIT twdialud;
{$I switches.inc}
INTERFACE
USES
teglunit,
twcommon,
twkernel,
twcontrl,
twdialog;
Procedure twdAddReal(wf : WinFramePtr;
x,y : Integer;
Mess: String;
VAR r: Real;
len: Byte;
places: Byte);
Procedure twdAddInteger(wf : WinFramePtr;
x,y : Integer;
Mess: String;
VAR utype: Integer;
len: Byte);
Procedure twdAddWord(wf : WinFramePtr;
x,y : Integer;
Mess: String;
VAR utype: Word;
len: Byte);
Procedure twdAddLongInt(wf : WinFramePtr;
x,y : Integer;
Mess: String;
VAR utype: LongInt;
len: Byte);
Procedure twdAddByte(wf : WinFramePtr;
x,y : Integer;
Mess: String;
VAR utype: Byte;
len: Byte);
IMPLEMENTATION